#!/usr/bin/perl
# uninstall.pl
use strict;

print "Now you see me: ";
use Uninstallable;
print $Uninstallable::message;

print "Now you don't!\n";
no Uninstallable;
print $Uninstallable::message;